object Form1: TForm1
  Left = 196
  Top = 101
  Width = 339
  Height = 276
  Caption = 'Demo4 - FindKey Example 2'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnCreate = FormCreate
  TextHeight = 16
  object Label1: TLabel
    Left = 29
    Top = 11
    Width = 107
    Height = 16
    Caption = 'Company Name:'
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 51
    Width = 310
    Height = 110
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'System'
    TitleFont.Style = []
  end
  object Button1: TButton
    Left = 30
    Top = 201
    Width = 113
    Height = 33
    Caption = 'FindKey'
    TabOrder = 3
    OnClick = Button1Click
  end
  object Edit1: TEdit
    Left = 170
    Top = 9
    Width = 121
    Height = 24
    TabOrder = 0
  end
  object Button2: TButton
    Left = 179
    Top = 201
    Width = 113
    Height = 33
    Caption = 'FindNearest'
    TabOrder = 4
    OnClick = Button2Click
  end
  object CheckBox1: TCheckBox
    Left = 84
    Top = 173
    Width = 172
    Height = 17
    Caption = 'Case Sensitive Search'
    TabOrder = 2
    OnClick = CheckBox1Click
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 29
    Top = 30
  end
  object Table1: TTable
    IndexName = 'ByCompany'
    TableName = 'newcust'
    Left = 67
    Top = 36
  end
end